10 RESTORE:READA:BO=PEEK(66)*256+PEEK(65)+3:DV=PEEK(186):IFDV<8THENDV=8
20 CE=BO+3:BL=BO+6:CO=BO+9:SW=BO+12:C2=BO+15:DY=BO+18:SYSBO
50 SYSCE,15,"[212][200][197] [195][207][205][208][204][197][212][197] [206][197][215] [212][197][211][212][193][205][197][206][212]":SYSCE,17,"[194]Y [202]EFF [202]ONES
70 [158]CE,19,"(LEN) 1997 BY MID$EFF MID$ONES
80 SYSCE,20,"[212]HIS [208]ROGRAM [201]SN'T [208]UBLIC [196]OMAIN
1000 [143] OPEN15,DV,15,"U0>M1":CLOSE15
5000 [158]DY,"COMPLEAT NT",DV
6000 [131]0